CAAJUPITERPlanet <-
function(Year){
.Call("JUPITERPlanet", Year)
}
